package com.qd.panda.service.space.publish;

import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.plugins.pagination.Page;
import com.cdqidi.constant.ConstantDto;
import com.cdqidi.db.BaseService;
import com.cdqidi.dto.CacheKey;
import com.cdqidi.exception.ApiException;
import com.cdqidi.util.DateUtil;
import com.cdqidi.util.RedisTemplateUtil;
import com.qd.common.panda.constant.PandaConstant;
import com.qd.common.panda.domain.entity.space.publish.ParkSpacePublishDTO;
import com.qd.panda.mapper.space.publish.ParkSpacePublishMapper;
import com.qd.panda.model.ParkSpacePublish;
import com.qd.panda.service.park.CarParkService;
import com.qd.system.service.dict.MbUtil;
import com.qd.system.service.login.LoginUserService;
import com.qd.system.service.org.OrgService;
import com.qd.system.service.user.UserOperatorService;
import lombok.RequiredArgsConstructor;
import lombok.extern.slf4j.Slf4j;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import java.time.Duration;
import java.time.LocalDate;
import java.time.LocalTime;
import java.util.Arrays;
import java.util.Collections;
import java.util.List;
import java.util.Optional;

import static java.util.stream.Collectors.toList;

/**
 * 发布车位租赁
 *
 * @author sjk
 */
@RequiredArgsConstructor
@Service
@Slf4j
public class ParkSpacePublishService extends BaseService<ParkSpacePublishMapper, ParkSpacePublish> {

    private static final String PREFIX_ID = "panda_park_space_publish_publishId_{0}";

    private final RedisTemplateUtil<ParkSpacePublish> redisTemplateUtil;
    private final CarParkService carParkService;
    private final LoginUserService loginUserService;
    private final OrgService orgService;

    /**
     * 保存
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public ParkSpacePublishDTO save(ParkSpacePublishDTO dto) {
        validator(dto);
        final ParkSpacePublish model = dtoToModel(dto);
        try {
            if (super.save(model)) {
                return modelToDto(model);
            }
            throw new ApiException("添加失败");
        } finally {
            clearCache(model);
            model.freeData();
        }
    }


    /**
     * 修改
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public ParkSpacePublishDTO update(ParkSpacePublishDTO dto) {
        final ParkSpacePublish historyModel = Optional.ofNullable(getById(dto.getPublishId())).orElseThrow(() -> new ApiException("ID不存在,不能更新"));
        final ParkSpacePublish model = dtoToModel(dto);
        try{
            if (super.updateById(model)) {
                return modelToDto(model);
            }
            throw new ApiException("更新失败");
        }finally {
            clearCache(historyModel);
            historyModel.freeData();
            model.freeData();
        }
    }

    /**
     * 批量添加
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void saveBatch(List<ParkSpacePublish> mList) {
        try {
            if (!super.saveBatch(mList)) {
                throw new ApiException("批量添加失败");
            }
        } finally {
            clearCaches(mList);
        }
    }

    /**
     * 批量更新
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void updateBatchIds(List<ParkSpacePublish> mList) {
        final List<String> ids = mList.stream().map(ParkSpacePublish::getPublishId).collect(toList());
        final List<ParkSpacePublish> historyModelList = checkIds(ids);
        try {
            if (!super.updateBatchById(mList)) {
                throw new ApiException("批量更新失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
            ids.clear();
        }
    }

    /**
     * 删除，单个
     *
     * @param publishId 主键 
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeById(String publishId) {
        final ParkSpacePublish historyModel = Optional.ofNullable(getById(publishId)).orElseThrow(() -> new ApiException("数据不存在,不能删除"));
        try {
            if (!super.removeById(publishId)) {
                throw new ApiException("删除失败");
            }
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
        }
    }

    /**
     * 批量删除
     *
     * @param ids 主键集合
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeBatchIds(List<String> ids) {
        final List<ParkSpacePublish> historyModelList = checkIds(ids);
        try {
            if (!super.removeByIds(ids)) {
                throw new ApiException("批量删除失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
        }
    }

    /**
     * 根据传入对象构建查询参数，判断是否存在
     *
     * @param dto 参数
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExists(ParkSpacePublishDTO dto) {
        final QueryWrapper<ParkSpacePublish> queryWrapper = createQueryWrapper(dto);
        final boolean exists = super.count(queryWrapper) > 0;
        queryWrapper.clear();
        return exists;
    }

    /**
     * 根据主键判断数据是否存在
     *
     * @param publishId 主键 
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExistsById(String publishId) {
        boolean exists = false;
        if (StringUtils.hasLength(publishId)) {
            final ParkSpacePublish model = getById(publishId);
            exists = (null != model);
            if (exists) {
                model.freeData();
            }
        }
        return exists;
    }

    /**
     * 根据主键获取数据
     *
     * @param publishId 主键 
     * @return 单条记录
     */
    public ParkSpacePublish getById(String publishId) {
        final String key = RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, publishId);
        return redisTemplateUtil.get(new CacheKey().setKey(key).setTimeout(ConstantDto.REDIS_TIME_OUT_DAY), () -> super.getById(publishId), ParkSpacePublish.class);
    }

    /**
     * 根据主键获取数据
     *
     * @param publishId 主键 
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public ParkSpacePublishDTO getByIdDto(String publishId) {
        return Optional.ofNullable(getById(publishId)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录
     */
    public ParkSpacePublish getOne(ParkSpacePublishDTO dto) {
        final QueryWrapper<ParkSpacePublish> queryWrapper = createQueryWrapper(dto);
        ParkSpacePublish model = super.getOne(queryWrapper);
        queryWrapper.clear();
        return model;
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public ParkSpacePublishDTO getOneDto(ParkSpacePublishDTO dto) {
        return Optional.ofNullable(getOne(dto)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据
     */
    public List<ParkSpacePublish> getList(ParkSpacePublishDTO dto) {
        final QueryWrapper<ParkSpacePublish> queryWrapper = createQueryWrapper(dto);
        final List<ParkSpacePublish> list = super.list(queryWrapper);
        queryWrapper.clear();
        return list;
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据，转换成页面对象
     */
    @Transactional(readOnly = true)
    public List<ParkSpacePublishDTO> getListDto(ParkSpacePublishDTO dto) {
        return modelToDtoList(getList(dto));
    }

    /**
     * 分页数据
     *
     * @param page 分页对象
     * @param dto  查询参数
     * @return 分页信息
     */
    @Transactional(readOnly = true)
    public IPage<ParkSpacePublishDTO> page(Page<ParkSpacePublish> page, ParkSpacePublishDTO dto) {
        final QueryWrapper<ParkSpacePublish> queryWrapper = createQueryWrapper(dto, "t1.");
        UserOperatorService.buildInSql(dto, queryWrapper);
        final IPage<ParkSpacePublishDTO> iPage = baseMapper.page(page, queryWrapper);
        Optional.ofNullable(iPage.getRecords()).ifPresent(l-> l.forEach(this::buildDisplay));
        queryWrapper.clear();
        return iPage;
    }

    /**
     * 清空缓存
     *
     * @param model 数据库对象
     */
    public void clearCache(ParkSpacePublish model) {
        if (null == model) {
            return;
        }
        redisTemplateUtil.deleteByKey(RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getPublishId()));
    }

    /**
     * 批量清空缓存
     *
     * @param list 数据库对象
     */
    public void clearCaches(List<ParkSpacePublish> list) {
        if (null == list || list.isEmpty()) {
            return;
        }
        List<String> ids = list.stream().map(model -> RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getPublishId())).collect(toList());
        if (!ids.isEmpty()) {
            redisTemplateUtil.deleteByKey(ids);
            ids.clear();
        }
    }

    /**
     * 数据库对象转页面对象
     *
     * @param model 数据库对象
     * @return 页面对象
     */
    public ParkSpacePublishDTO modelToDto(ParkSpacePublish model) {
        if (null == model) {
            return null;
        }
        final ParkSpacePublishDTO dto = new ParkSpacePublishDTO();
        dto.setPublishId(model.getPublishId());
        dto.setTitle(model.getTitle());
        dto.setStartDate(DateUtil.localDateToStr(model.getStartDate()));
        dto.setEndDate(DateUtil.localDateToStr(model.getEndDate()));
        Optional.ofNullable(model.getStartHour()).ifPresent(startHour -> dto.setStartHour(DateUtil.localTimeToString(startHour)));
        Optional.ofNullable(model.getEndHour()).ifPresent(endHour -> dto.setEndHour(DateUtil.localTimeToString(endHour)));
        dto.setDays(model.getDays());
        dto.setPublishTime(model.getPublishTime());
        dto.setNote(model.getNote());
        dto.setParkId(model.getParkId());
        dto.setParkSpaceType(model.getParkSpaceType());
        dto.setEnable(model.getEnable());
        dto.setLeaseType(model.getLeaseType());
        dto.setLoopPublish(model.getLoopPublish());
        dto.setOrgId(model.getOrgId());
        dto.setOperator(model.getOperator());
        buildDisplay(dto);
        return dto;
    }

    /**
     * 页面对象转数据库对象
     *
     * @param dto 页面对象
     * @return 数据库对象
     */
    public ParkSpacePublish dtoToModel(ParkSpacePublishDTO dto) {
        if (null == dto) {
            return null;
        }
        final ParkSpacePublish model = new ParkSpacePublish();
        model.setPublishId(dto.getPublishId());
        model.setTitle(dto.getTitle());
        model.setStartDate(DateUtil.strToLocalDate(dto.getStartDate()));
        model.setEndDate(DateUtil.strToLocalDate(dto.getEndDate()));
        Optional.ofNullable(dto.getStartHour()).ifPresent(startHour -> model.setStartHour(DateUtil.strToLocalTime(startHour)));
        Optional.ofNullable(dto.getEndHour()).ifPresent(endHour -> model.setEndHour(DateUtil.strToLocalTime(endHour)));
        model.setDays(dto.getDays());
        model.setPublishTime(dto.getPublishTime());
        model.setNote(dto.getNote());
        model.setParkId(dto.getParkId());
        model.setParkSpaceType(dto.getParkSpaceType());
        model.setEnable(dto.getEnable());
        model.setLeaseType(dto.getLeaseType());
        model.setLoopPublish(dto.getLoopPublish());
        model.setOrgId(dto.getOrgId());
        model.setOperator(dto.getOperator());
        return model;
    }

    /**
     * 码表转换
     *
     * @param dto 页面对象
     */
    public void buildDisplay(ParkSpacePublishDTO dto) {
        dto.setEnableDisplay(MbUtil.idToDisplay(dto.getEnable()));
        dto.setLeaseTypeDisplay(MbUtil.idToDisplay(dto.getLeaseType()));
        dto.setLoopPublishDisplay(MbUtil.idToDisplay(dto.getLoopPublish()));
        Optional.ofNullable(carParkService.getById(dto.getParkId())).ifPresent(carPark -> dto.setParkIdDisplay(carPark.getName()));
        dto.setParkSpaceTypeDisplay(MbUtil.idToDisplay(dto.getParkSpaceType()));
        Optional.ofNullable(loginUserService.getById(dto.getOperator())).ifPresent(loginUser -> dto.setOperatorDisplay(loginUser.getPersonName()));
        Optional.ofNullable(orgService.getById(dto.getOrgId())).ifPresent(org -> dto.setOrgIdDisplay(org.getOrgName()));
    }

    /**
     * 数据库对象转页面对象
     *
     * @param list 数据库对象
     * @return 页面对象
     */
    public List<ParkSpacePublishDTO> modelToDtoList(List<ParkSpacePublish> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::modelToDto).collect(toList());
    }

    /**
     * 页面对象转数据库对象
     *
     * @param list 页面对象
     * @return 数据库对象
     */
    public List<ParkSpacePublish> dtoToModelList(List<ParkSpacePublishDTO> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::dtoToModel).collect(toList());
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto 查询参数，不为空的属性会被自动加入
     */
    public QueryWrapper<ParkSpacePublish> createQueryWrapper(ParkSpacePublishDTO dto) {
        return createQueryWrapper(dto, "");
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto        查询参数，不为空的属性会被自动加入
     * @param tableAlias 表别名
     */
    public QueryWrapper<ParkSpacePublish> createQueryWrapper(ParkSpacePublishDTO dto, String tableAlias) {
        final QueryWrapper<ParkSpacePublish> queryWrapper = new QueryWrapper<>();
        if (null != dto) {
            if (StringUtils.hasLength(tableAlias) && tableAlias.charAt(tableAlias.length() - 1) != '.') {
                tableAlias += ".";
            }
            if (StringUtils.hasLength(dto.getTitle())) {
                queryWrapper.like(tableAlias + "title", dto.getTitle());
            }
            if (StringUtils.hasLength(dto.getParkId())) {
                queryWrapper.eq(tableAlias + "park_id", dto.getParkId());
            }
            if (StringUtils.hasLength(dto.getParkSpaceType())) {
                queryWrapper.eq(tableAlias + "park_space_type", dto.getParkSpaceType());
            }
            if (StringUtils.hasLength(dto.getEnable())) {
                queryWrapper.eq(tableAlias + "enable", dto.getEnable());
            }
            if (StringUtils.hasLength(dto.getLeaseType())) {
                queryWrapper.eq(tableAlias + "lease_type", dto.getLeaseType());
            }
            if (StringUtils.hasLength(dto.getLoopPublish())) {
                queryWrapper.eq(tableAlias + "loop_publish", dto.getLoopPublish());
            }
        }
        queryWrapper.orderByAsc(tableAlias + "publish_time");
        queryWrapper.orderByDesc(tableAlias + "park_id");
        return queryWrapper;
    }

    /**
     * 批量检查主键在数据库中是否存在
     *
     * @param ids 主键集合
     * @return 主键查询出来的集合
     */
    public List<ParkSpacePublish> checkIds(List<String> ids) {
        if (null == ids || ids.isEmpty()) {
            throw new ApiException("ids不能为空");
        }
        final List<ParkSpacePublish> list = super.listByIds(ids);
        if (list.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(ids.toArray()));
        }
        if (ids.size() == list.size()) {
            return list;
        }
        List<String> dbIds = list.stream().map(ParkSpacePublish::getPublishId).collect(toList());
        final List<String> notExistsList = ids.stream().filter(id -> !dbIds.contains(id)).collect(toList());
        dbIds.clear();
        if (!notExistsList.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(notExistsList.toArray()));
        }
        return list;
    }

    @Transactional(readOnly = true)
    public List<ParkSpacePublishDTO> getListByLoopPublishDTO(String loopPublish) {
        return modelToDtoList(getListByLoopPublish(loopPublish));
    }

    @Transactional(readOnly = true)
    public List<ParkSpacePublish> getListByLoopPublish(String loopPublish) {
        final QueryWrapper<ParkSpacePublish> queryWrapper = new QueryWrapper<>();
        queryWrapper.eq("loop_publish", loopPublish);
        queryWrapper.eq("enable", ConstantDto.SF1);
        List<ParkSpacePublish> parkSpacePublishList = baseMapper.selectList(queryWrapper);
        queryWrapper.clear();
        return parkSpacePublishList;
    }

    private void validator(ParkSpacePublishDTO dto) {
        LocalDate start = DateUtil.strToLocalDate(dto.getStartDate());
        LocalDate end = DateUtil.strToLocalDate(dto.getEndDate());
        if (end.isBefore(start)) {
            throw new ApiException("开始时间和结束时间填写错误");
        }
        if (StringUtils.hasLength(dto.getLeaseType())) {
            if (dto.getLeaseType().equals(PandaConstant.LEASE_TYPE_DAY)) {
                if (StringUtils.hasLength(dto.getStartHour())) {
                    throw new ApiException("开始小时不能有值");
                }
                if (StringUtils.hasLength(dto.getEndHour())) {
                    throw new ApiException("结束小时不能有值");
                }
                long days = (end.toEpochDay() - start.toEpochDay()) + 1;
                if (days < 2) {
                    throw new ApiException("两天起租");
                }
                if (days > 30) {
                    throw new ApiException("租赁时间最长不能超过30天");
                }
                dto.setDays(days);
            } else if (dto.getLeaseType().equals(PandaConstant.LEASE_TYPE_HOUR)) {
                if (!dto.getStartDate().equals(dto.getEndDate())) {
                    throw new ApiException("开始时间和结束时间必须一致");
                }
                if (!StringUtils.hasLength(dto.getStartHour())) {
                    throw new ApiException("开始小时不能为空");
                }
                if (!StringUtils.hasLength(dto.getEndHour())) {
                    throw new ApiException("结束小时不能为空");
                }
                LocalTime startHour = DateUtil.strToLocalTime(dto.getStartHour());
                LocalTime endHour = DateUtil.strToLocalTime(dto.getEndHour());
                if (endHour.isBefore(startHour) || startHour.equals(endHour)) {
                    throw new ApiException("开始小时和结束小时填写错误");
                }
                long minutes = Duration.between(startHour, endHour).toMinutes();
                long hours = minutes / 60;
                long hoursRemainder = minutes % 60;
                if (hoursRemainder > 0) {
                    hours += 1;
                }
                if (hours < 2) {
                    throw new ApiException("两小时起租");
                }
                dto.setDays(hours);
            } else {
                throw new ApiException("租赁类型值错误");
            }
        }
    }
}